home *** CD-ROM | disk | FTP | other *** search
- on startMovie
- cursor(4)
- end
-
- on soundfader chan
- if soundBusy(chan) = 1 then
- set sttime to the ticks + the volume of sound 1
- repeat while the volume of sound chan > chan
- set the volume of sound chan to sttime - the ticks
- updateStage()
- end repeat
- sound stop chan
- set the volume of sound chan to 255
- set the soundLevel to 5
- end if
- end
-